setwd("C:/Users/enos/Dropbox/Enos-Hersh Obama Project/EnosHershReplication")
source('C:/Users/enos/Dropbox/Enos-Hersh Obama Project/EnosHershReplication/EnosHershReplication.r')
install.packages('epicalc')
source('C:/Users/enos/Dropbox/Enos-Hersh Obama Project/EnosHershReplication/EnosHershReplication.r')
install.packages('cem')
source('C:/Users/enos/Dropbox/Enos-Hersh Obama Project/EnosHershReplication/EnosHershReplication.r')
source('C:/Users/enos/Dropbox/Enos-Hersh Obama Project/EnosHershReplication/EnosHershReplication.r')
source.with.encoding('~/.active-rstudio-document', encoding='UTF-8')
warnings()
##remove data
rm(list = ls())
options(scipen=999)  ##turn off scientific notation
##load libraries
library(foreign)
library(gdata)
library(RColorBrewer)
library(MatchIt)
library(nlme)
library(xtable)
library(Rmisc)
library(maptools)
library(raster)
library(rgdal)
library(colorspace)
library(gplots)
library(epicalc)
library(Gmisc)
library(grid)
##VARIABLES USED REPEATEDLY IN ANALYSIS
var.names = c('very.liberal','moderate','strong.partisan','vote.2010','female','white','black','hispanic','college.track','non.church','income.recode','age')
##BATTLE GROUND STATES
battles = c('FL','CO','IA','NV','NH','NC','OH','VA','WI')
##GRAY COLOR GOR GRAPHS
gray.color = colors()[320]
##LOAD DATA
load('EnosHershData.RData')
View(CCAP.com.dat)
names(CCAP.com.dat)
View(CCES.dat)
names(CCES.dat)
names(GCP.dat)
view(CGP.dat)
Wiew(CGP.dat)
View(CGP.dat)
View(GCP.dat)
table(GCP.dat$ideology.recode.1)
names(stack.dat)
View(stack.dat)
names(vote.dat)
